home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Birth of Jesus Activity Center
/
Birth of Jesus Activity Center.iso
/
mac
/
data
/
babyj.dir
/
00280_Script_LC_btnDn
< prev
next >
Wrap
Text File
|
1997-11-02
|
724b
|
29 lines
-- class down buttons
property ancestor
property memID, rollmemID, clkmemID, clkEnable, difficulty
global gMouseDownList, gMouseUpList, gRolloverList, gHoldOverList, gLastRollover
global gNameListTop, gGameList
on new me, ch, ink, vis, stdm, rollm, clkm, htime
set ancestor = new(script "LC_btnSprite", ch, ink, vis, stdm, rollm, clkm, htime)
setAt gMouseDownList, ch, me
setAt gMouseUpList, ch, me
setAt gRolloverList, ch, me
setAt gHoldOverList, ch, me
return me
end
on handleAction me
-- respond to click
if gNameListTop + 4 < count(gGameList) then
set gNameListTop = gNameListTop + 1
drawNameList
end if
end
on handleHoldOver me
-- respond to Hold Over
end